home *** CD-ROM | disk | FTP | other *** search
/ PC Player 2004 May / pc player 2004-05.iso / Demos / FarCry / Data1.cab / _0032E6411DA94D799D5C68C1ABADF036 < prev    next >
Encoding:
Text File  |  2004-01-06  |  22.3 KB  |  818 lines
  1. --#Script.ReloadScript("SCRIPTS/Default/Entities/Vehicles/Zodiac.lua")
  2.     Zodiac = {
  3. --    type = "Vehicle",
  4.     IsBoat = 1,
  5.  
  6.     bNoImpuls=1,
  7.  
  8.     --model to be used for destroyed vehicle
  9.     fileModelDead = "objects/Vehicles/zodiacraft/zodiacraft_wreck.cgf",
  10.     fPartUpdateTime=0,
  11.     curPathStep = 0,
  12.  
  13.     --entering fake_jump/blending staff
  14.     entVel = 9,
  15.     
  16.     userCounter = 0,
  17.     driverWaiting = 0,
  18.     driverDelay = 0,
  19.     passengerLimit = 0,
  20.  
  21.     
  22.     onPath = 0,
  23.     
  24.     -- previous state on the client before entering the vehicle
  25.     bDriverInTheVehicle = 0,
  26.     -- previous driver on the client before leaving the vehicle
  27.     pPreviousDriver=nil,
  28.     -- previous passenger state on the client before entering the vehicle
  29.     bPassengerInTheVehicle = 0,
  30.     -- previous passenger on the client before leaving the vehicle
  31.     pPreviousPassenger=nil,
  32.  
  33.     IsPhisicalized = 0,    
  34.  
  35. ----------------------------end---------------------------------------
  36.  
  37.     -- particle system to display when the vehicle is damaged stage 1
  38.     Damage1Effect = "smoke.vehicle_damage1.a",
  39.     -- particle system to display when the vehicle is damaged stage 2
  40.     Damage2Effect = "smoke.vehicle_damage2.a",
  41.     -- particle system to display when the vehicle explodes
  42.     ExplosionEffect = "explosions.4WD_explosion.a",
  43.     -- particle system to display when the vehicle is destroyed
  44.     DeadEffect = "fire.burning_after_explosion.a",
  45.     -- material to be used when vehicle is destroyed
  46.     DeadMaterial = "Vehicles.Zodiacraft_Screwed",
  47.  
  48.  
  49.  
  50.  
  51.     szNormalModel="objects/Vehicles/zodiacraft/zodiacraft.cgf",
  52.  
  53.     PropertiesInstance = {
  54.         sightrange = 180,
  55.         soundrange = 10,    -- rememeber that sound ranges intersect and sound range for AI doubles when in alert
  56.         aibehavior_behaviour = "Boat_idle",        
  57.         groupid = 154,
  58.     },
  59.  
  60.  
  61.     Properties = {        
  62.     
  63.         bActive = 1,    -- if vehicle is initially active or needs to be activated 
  64.                 -- with Event_Activate first
  65.         bTrackable=1,
  66.         fileName = "objects/Vehicles/zodiacraft/zodiacraft.cgf",            
  67.         
  68.         -- [kirill] vehicle gets different damage depending on who's shooter
  69.         -- defines the intensity of the damage caused by the weapons to
  70.         -- the vehicle
  71.         -- shooter is player
  72.         fDmgScaleExplosion = 1.0,        -- explosions
  73.         fDmgScaleBullet = 1.0,            -- shooting
  74.         -- shooter is AI
  75.         fDmgScaleAIExplosion = 0.7,        -- explosions
  76.         fDmgScaleAIBullet = 0.7,            -- shooting
  77.  
  78.         fAISoundRadius = 30,
  79.         
  80.         bUserPassanger = 0,
  81.         bDrawDriver = 0,
  82.         damping = 0.1,
  83.         water_damping = 1.5,
  84.         water_resistance = 0,
  85.         fLimitLRAngles = 150,
  86.         fLimitUDMinAngles = -45,
  87.         fLimitUDMaxAngles = 40,
  88.  
  89.  
  90.         ExplosionParams = {
  91.             nDamage = 800,
  92.             fRadiusMin = 5.0,
  93.             fRadiusMax = 10, -- default 25.5
  94.             fRadius = 10,    -- default 17 
  95.             fImpulsivePressure = 350,
  96.         },
  97.         
  98. -- those are AI related properties
  99.         pointReinforce = "Drop",
  100.         pointBackOff = "Base",
  101.         aggression = 1.0,
  102.         commrange = 100.0,
  103.         cohesion = 5,
  104.         attackrange = 70,
  105.         horizontal_fov = 160,
  106.         vertical_fov =90,
  107.         eye_height = 2.1,
  108.         max_health = 70,
  109.         accuracy = 0.6,
  110.         responsiveness = 7,
  111.         species = 1,
  112.         fSpeciesHostility = 2,
  113.         fGroupHostility = 0,
  114.         fPersistence = 0,
  115.         aicharacter_character = "BoatZodiac",
  116.         bodypos = 0,
  117.         pathname = "none",
  118.         pathsteps = 0,
  119.         pathstart = 0,
  120.         ReinforcePoint = "none",
  121.  
  122.         forward_speed = 1,    -- don't scale down fwd impuls - max speed
  123.         
  124.     },
  125.  
  126. --    b_speedv = 400,  -- controls Zodiac speed (movement impulse)
  127. --    b_turn = 20,  -- controls how fast Zodiac turns (turning impulse)
  128. --    fMass = 400,
  129.  
  130. --        Dumprot         = 2500,
  131. --        Dumpv        = 300,
  132. --        Dumpv        = 1000,
  133. --        Turn        = 6000,
  134. --        Speedv        = 8000,
  135.  
  136. ---------------------------- HERE
  137.     boat_params={
  138.         Damprot         = 1000,    --turning damp
  139.         Dampv        = 300,    --movement damp
  140.         Dampvs        = 500,    --movement damp
  141.         Dampvh        = 8000,    --
  142. --        Dampw        = 1400,    --waves damp
  143.         Dampw        = .22,    --waves damp        
  144.         Turn        = 400,
  145.         TurnMin        = 700,    --7000
  146.         TurnVelScale    = 10,        
  147.         
  148.         Speedv        = 5000,    -- 5500,
  149.         
  150.         Speedturnmin    = .2,
  151.         WaveM        = 300,    --fake waves momentum
  152.         Stand        = 8000,    -- forsing to normal vertical position impuls
  153.         TiltTurn    = 100,    --tilt momentum when turning
  154.         TiltSpd        = 80,    --tilt momentum when speeding up
  155.         TiltSpdA    = 0.06,    --tilt momentum when speeding up (acceleration thrhld)
  156.         TiltSpdMinV    = 10.0,    --tilt momentum when speeding up (min speed to tilt when not accelerating)
  157.         TiltSpdMinVTilt    = 0.37,    --tilt momentum when speeding up (how much to tilt when not accelerating)
  158.         fMass         = 400,
  159.         Flying        = 0,
  160.  
  161.         CameraDist    = 6,
  162.  
  163. --        Dumprot         = 2500,    --turning damp
  164. --        Dumpv        = 300,    --movement damp
  165. --        Dumpvs        = 500,    --movement damp        
  166. --        Dumpvh        = 8000,    --
  167. --        Dumpw        = 5000,    --waves damp
  168. --        Turn        = 3000,
  169. --        Speedv        = 5000,
  170. --        Speedturnmin    = .2,
  171. --        WaveM        = 500,    --fake waves momentum
  172. --        Stand        = 10000,    -- forsing to normal vertical position impuls
  173. --        TiltTurn    = 300,    --tilt momentum when turning
  174. --        TiltSpd        = 530,    --tilt momentum when speeding up
  175. --        fMass         = 400,
  176. --        Flying        = 0,
  177.  
  178.  
  179.  
  180.  
  181. --        Dumprot         = 2500,    --turning damp
  182. --        Dumpv        = 300,    --movement damp
  183. --        Dumpvh        = 10000,    --
  184. --        Dumpw        = 2000,    --waves damp
  185. --        Turn        = 8000,
  186. --        Speedv        = 5000,
  187. --        Speedturnmin    = 2,
  188. --        WaveM        = 500,    --fake waves momentum
  189. --        Stand        = 10000,    -- forsing to normal vertical position impuls
  190. --        TiltTurn    = 30,    --tilt momentum when turning
  191. --        fMass         = 400,
  192. --        Flying        = 0,
  193.     },
  194.  
  195.     boat_paramsAI={
  196.         Damprot         = 2500,    --turning dump
  197.         Dampv        = 300,    --movement dump
  198.         Dampvs        = 300,    --movement dump
  199.         Dampvh        = 10000,    --
  200. --        Dampw        = 200,    --waves dump
  201.         Dampw        = .09,    --waves damp                
  202.         Turn        = 1000,
  203.         TurnMin        = 1000,    --7000
  204.         TurnVelScale    = 10,
  205.         Speedv        = 10000,
  206.         Speedturnmin    = 0.5,
  207.         WaveM        = 500,    --fake waves momentum
  208.         Stand        = 10000,    -- forsing to normal vertical position impuls
  209.         TiltTurn    = 30,    --tilt momentum when turning
  210.         TiltSpd        = 100,    --tilt momentum when speeding up        
  211.         TiltSpdA    = 0.06,    --tilt momentum when speeding up (acceleration thrhld)
  212.         TiltSpdMinV    = 10.0,    --tilt momentum when speeding up (min speed to tilt when not accelerating)
  213.         TiltSpdMinVTilt    = 0.37,    --tilt momentum when speeding up (how much to tilt when not accelerating)
  214.         fMass         = 400,
  215.         Flying        = 0,
  216.         
  217.     },
  218.  
  219.  
  220.     
  221.     sound_time = 0,
  222.     partDmg_time = 0,    
  223.     
  224.  
  225. --// particles definitions
  226. --////////////////////////////////////////////////////////////////////////////////////////
  227.  
  228.     WaterParticle = {--boat engines affecting the water (splashes behind the boat)
  229.         focus = 20,
  230.         speed = 2.0,
  231.         count = 7,
  232.         size = 1.8, 
  233.         size_speed=0.01,
  234.         gravity={x=0,y=0,z=-3.4},
  235.         rotation={x=1,y=1,z=2},
  236.         lifetime= 1.2,
  237.         tid = System:LoadTexture("textures\\water_splash"),
  238.         start_color = {1,1,1},
  239.         end_color = {1,1,1},
  240.         blend_type = 0,
  241.         frames=0,
  242.         draw_last=1,
  243.             },
  244.  
  245.     WaterFogTrail=  {
  246.                 focus = 50,
  247.                 start_color = {1,1,1},
  248.                 end_color = {1,1,1}, 
  249.                 gravity = {x = 0.0,y = 0.0,z = -6.5}, --default z = -6.5
  250.                 rotation = {x = 0.0, y = 0.0, z = 2},
  251.                 speed = 12, -- default 12
  252.                 count = 6,
  253.                 size = 1, 
  254.                 size_speed=2.50, --default = 15
  255.                 lifetime= 1.0, --default = 3.5
  256.                 tid = System:LoadTexture("textures\\dirt2"),---clouda2.dds
  257.                 frames=1,
  258.                 blend_type = 0
  259.             },
  260.     WaterSplashes=
  261.             { --boat engines affecting the water (trail thats left behind the boat)
  262.                 focus = 60.0,
  263.                 start_color = {1,1,1},
  264.                 end_color = {1,1,1},
  265.                 gravity = {x = 0.0,y = 0.0,z = 0.0},
  266.                 rotation = {x = 0.0, y = 0.0, z = 0.5},
  267.                 speed = 2,
  268.                 count = 2,
  269.                 size = 5.0,
  270.                 size_speed=20,
  271.                 lifetime= 9.0,
  272.                 tid = System:LoadTexture("textures\\water_splash"),
  273.                 frames=1,
  274.                 blend_type = 0,
  275.                 particle_type=1
  276.             },
  277.  
  278.     PropellerWake=
  279.             { --PropellerWake
  280.                 focus = 20.0,
  281.                 start_color = {1,1,1},
  282.                 end_color = {1,1,1},
  283.                 gravity = {x = 0.0,y = 0.0,z = 0.0}, 
  284.                 rotation = {x = 0.0, y = 0.0, z = 0.1}, 
  285.                 speed = 6,
  286.                 count = 2,
  287.                 size = 4.0,
  288.                 size_speed=4.0,
  289.                 lifetime= 6.0,
  290.                 tid = System:LoadTexture("textures\\water_splash"),
  291.                 frames=1,
  292.                 blend_type = 0,
  293.                 particle_type=1
  294.             },
  295.  
  296.     
  297.     bExploded=false,
  298.  
  299.     -- engine health, status of the vehicle
  300.     -- default is set to maximum (1.0f)
  301.     fEngineHealth = 100.0,
  302.  
  303.     -- damage inflicted to the vehicle when it collides
  304.     fOnCollideDamage=0,
  305.     -- damage inflicted to the vehicle when it collides with terrain (falls off)
  306.     fOnCollideGroundDamage=0,
  307.  
  308.     bGroundVehicle=0,
  309.  
  310.     driverT = {
  311.         type = PVS_DRIVER,
  312.     
  313.         helper = "driver",
  314.         in_helper = "driver_sit_pos",
  315.         sit_anim = "inflatable_driver_sit",
  316.         anchor = AIAnchor.AIANCHOR_BOATENTER_SPOT,
  317.         out_ang = -90,
  318.         message = "@driverzodiac",
  319.         timePast=0,
  320.         HS=0,    -- used for fake jump arch calculatio - arch scale
  321.         HK=0,    -- used for fake jump arch calculatio
  322.         HO=0,    -- used for fake jump arch calculatio    
  323.         HT=0,    -- used for fake jump arch calculatio
  324.         
  325.         animations = {
  326.             "inflatable_driver_sit",        -- idle in animation
  327.             "inflatable_driver_moving",        -- driving firward
  328.             "inflatable_driver_forward_hit",    -- impact / break
  329.             "inflatable_driver_leftturn",    -- turning left
  330.             "inflatable_driver_rightturn",    -- turning right
  331.             "inflatable_driver_reverse",    -- reversing
  332.             "inflatable_driver_reverse_hit",    -- reversing impact / break
  333.         },
  334.     },
  335.  
  336.     passengersTT = {
  337.         {
  338.         type = PVS_PASSENGER,
  339.         
  340.         helper = "psngr_sit_pos01",
  341.         in_helper = "psngr_sit_pos01",
  342. --        helper = "driver",
  343. --        in_helper = "driver",
  344.         sit_anim = "vzsittingd",
  345.         anchor = AIAnchor.AIANCHOR_BOATENTER_SPOT,
  346.         out_ang = -90,
  347.         message = "@passengerzodiac",
  348.         timePast=0,
  349.         HS=0,    -- used for fake jump arch calculatio - arch scale
  350.         HK=0,    -- used for fake jump arch calculatio
  351.         HO=0,    -- used for fake jump arch calculatio    
  352.         HT=0,    -- used for fake jump arch calculatio
  353.         },
  354.     },
  355. } 
  356.  
  357. VC.CreateVehicle(Zodiac);
  358.  
  359. --////////////////////////////////////////////////////////////////////////////////////////
  360. function Zodiac:OnReset()
  361.     VC.OnResetCommon(self);
  362.  
  363.     self:NetPresent(1);
  364.  
  365.     VC.EveryoneOutForce(self);
  366.  
  367.     self.onPath = 0;
  368.  
  369.     self.fEngineHealth = 100.0;
  370.     
  371.     self.bExploded=false;
  372.     self.cnt:SetVehicleEngineHealth(self.fEngineHealth);
  373.  
  374.     self.fPartUpdateTime = 0;
  375.     --AI stuff
  376.     AI:RegisterWithAI(self.id, AIOBJECT_BOAT,self.Properties,self.PropertiesInstance);
  377. --    self:RegisterWithAI(AIOBJECT_BOAT,self.Properties);    
  378. --    AI_HandlersDefault:InitCharacter( self );
  379.     VC.AIDriver( self, 0 );    
  380.     
  381.     -- Put physics asleep.
  382.     self:AwakePhysics(0);
  383. end
  384.  
  385. --////////////////////////////////////////////////////////////////////////////////////////
  386. --////////////////////////////////////////////////////////////////////////////////////////
  387. --// CLIENT functions definitions
  388. --////////////////////////////////////////////////////////////////////////////////////////
  389. --////////////////////////////////////////////////////////////////////////////////////////
  390. Zodiac.Client = {
  391.     OnInit = function(self)
  392.         self:InitClient();
  393.     end,
  394.     OnShutDown = function(self)
  395.         self:OnShutDown();
  396.     end,
  397.     
  398.     Alive = {
  399.         OnBeginState = function( self )    
  400.             VC.InitBoatCommon(self);
  401.         end,
  402.         OnContact = function(self,player)
  403.              self:OnContactClient(player);
  404.         end,
  405.         OnUpdate = function(self,dt)
  406.              self:UpdateClientAlive(dt);
  407.         end,
  408.         OnCollide = VC.OnCollideClient,
  409.         OnBind = VC.OnBind,
  410.         OnUnBind = VC.OnUnBind,
  411.     },
  412.     Inactive = {
  413.         OnBeginState = function( self )
  414.             self:Hide(1);
  415.         end,
  416.         OnEndState = function( self )
  417.             self.IsPhisicalized = 0;
  418.         end,
  419.     },
  420.     Dead = {
  421.         OnBeginState = function( self )
  422.             VC.BlowUpClient(self);
  423.         end,
  424.         OnContact = function(self,player)
  425.              self:OnContactClient(player);
  426.         end,
  427.         OnUpdate = VC.UpdateClientDead,
  428.         OnCollide = VC.OnCollideClient,
  429.         OnUnBind = VC.OnUnBind,
  430.     },
  431. }
  432.  
  433. --////////////////////////////////////////////////////////////////////////////////////////
  434. function Zodiac:InitClient()
  435.     VC.InitSeats(self, Zodiac);
  436.  
  437.     --// load sounds on client only 
  438.     --////////////////////////////////////////////////////////////////////////////////////////
  439.     
  440.     self.ExplosionSound=Sound:Load3DSound("sounds\\weapons\\explosions\\mbarrel.wav",0,0,7,100000);
  441.  
  442.     self.drive_sound = Sound:Load3DSound("sounds\\vehicle\\boat\\zod_idle.wav",0,255,30,150);
  443.     self.drive_sound_move = Sound:Load3DSound("sounds\\vehicle\\boat\\splashLP.wav",0,200,30,150);
  444.  
  445.     self.accelerate_sound = {
  446.         Sound:Load3DSound("sounds\\vehicle\\rev1.wav",0,0,7,100000),
  447.         Sound:Load3DSound("sounds\\vehicle\\rev2.wav",0,0,7,100000),
  448.         Sound:Load3DSound("sounds\\vehicle\\rev3.wav",0,0,7,100000),
  449.         Sound:Load3DSound("sounds\\vehicle\\rev4.wav",0,0,7,100000),
  450.     };
  451.  
  452.     self.break_sound = Sound:Load3DSound("sounds\\vehicle\\break1.wav",0,0,7,100000);
  453.     self.engine_start = Sound:Load3DSound("sounds\\vehicle\\boat\\zod_start.wav",0,255,30,150);
  454.     self.engine_off = Sound:Load3DSound("sounds\\vehicle\\boat\\zod_off.wav",0,255,30,150);
  455.     self.sliding_sound = Sound:Load3DSound("sounds\\vehicle\\break2.wav",0,0,7,100000);
  456.  
  457.     self.crash_sound = Sound:Load3DSound("sounds\\vehicle\\boat\\rubber.wav",0,100,7,100000);
  458.  
  459.     -- init common stuff for client and server
  460.     VC.InitBoatCommon(self,self.szNormalModel);
  461.  
  462. end
  463.  
  464. --////////////////////////////////////////////////////////////////////////////////////////
  465. function Zodiac:UpdateClientAlive(dt)
  466.  
  467.     if(self.lifeCounter < 100) then
  468.         self.lifeCounter = self.lifeCounter + 1;
  469.     end    
  470.  
  471.     VC.CreateWaterParticles(self);
  472.     -- create particles and all that 
  473.     VC.ExecuteDamageModel(self, dt);
  474.  
  475.     VC.PlayEngineOnOffSounds(self);
  476.  
  477.     -- plays the sounds, using a timestep of 0.04         
  478.  
  479.     self.sound_time = self.sound_time + dt;
  480.     if ( self.sound_time > 0.04 ) then        
  481.         
  482.         -- reset timer
  483.         self.sound_time = 0;
  484.  
  485.         -- get vehicle's velocity
  486.         local fCarSpeed = self.cnt:GetVehicleVelocity();
  487.         
  488.         VC.PlayDrivingSounds(self,fCarSpeed);
  489.  
  490.     end
  491.     
  492.     VC.UpdateUsersAnimations(self,dt);
  493. end
  494.  
  495. --////////////////////////////////////////////////////////////////////////////////////////
  496. function Zodiac:OnContactClient( player )
  497.  
  498.     if( player==_localplayer and self.Properties.bUsable==0 ) then return end    
  499.     VC.OnContactClientT(self,player);
  500. end
  501.  
  502.  
  503.  
  504. --////////////////////////////////////////////////////////////////////////////////////////
  505. --////////////////////////////////////////////////////////////////////////////////////////
  506. --// SERVER functions definitions
  507. --////////////////////////////////////////////////////////////////////////////////////////
  508. --////////////////////////////////////////////////////////////////////////////////////////
  509. Zodiac.Server = {
  510.     OnInit = function(self)
  511.         self:InitServer();
  512.     end,
  513.     OnEvent = function (self, id, params)
  514.         self:OnEventServer( id, params);
  515.     end,
  516.     OnShutDown = function(self)
  517.         self:OnShutDown();
  518.     end,
  519.     Alive = {
  520.         OnBeginState = function( self )    
  521.             VC.InitBoatCommon(self);
  522.         end,
  523.         OnContact = function(self,player)
  524.              self:OnContactServer(player);
  525.         end,
  526.         OnDamage = VC.OnDamageServer,
  527.         OnCollide = VC.OnCollideServer,
  528.         OnUpdate = function(self,dt)
  529.             self:UpdateServer(dt);
  530.         end,
  531.         
  532.     },
  533.     Inactive = {
  534.     },
  535.     Dead = {
  536.         OnBeginState = function( self )
  537.             VC.BlowUpServer(self);
  538.         end,
  539.         OnContact = function(self,player)
  540.              VC.OnContactClientDead(self,player);
  541.         end,            
  542.     },
  543. }
  544.  
  545. --////////////////////////////////////////////////////////////////////////////////////////
  546. function Zodiac:InitServer()
  547.     VC.InitSeats(self, Zodiac);
  548.     
  549.     -- init common stuff for client and server
  550.     VC.InitBoatCommon(self,self.szNormalModel);
  551.  
  552.     self:OnReset();
  553. end
  554.  
  555. -- called on the server when the player collides with the Zodiac
  556. --////////////////////////////////////////////////////////////////////////////////////////
  557. function Zodiac:OnContactServer( player )
  558.  
  559.     if( self.Properties.bUsable==0 ) then return end
  560.     VC.OnContactServerT(self,player);
  561. end
  562.  
  563.  
  564. --////////////////////////////////////////////////////////////////////////////////////////
  565. function Zodiac:UpdateServer(dt)
  566.  
  567.  
  568. --System:Log("\004 Zodiac:UpdateServer");▀
  569.     if( self.Properties.bUserPassanger == 1 ) then
  570.         if( self.driver == nil ) then
  571.             AI:Signal(SIGNALFILTER_GROUPONLY, 1, "wakeup", self.id);            
  572.             AI:Signal(SIGNALFILTER_GROUPONLY, 1, "SHARED_ENTER_ME_VEHICLE", self.id);
  573.         elseif(self.passenger ~= nil) then
  574.             self:StartPath();
  575.         end
  576.     end
  577.  
  578.     VC.UpdateEnteringLeaving( self, dt );
  579.     VC.UpdateServerCommonT( self, dt );
  580.  
  581. end
  582.  
  583.  
  584. --////////////////////////////////////////////////////////////////////////////////////////
  585. function Zodiac:OnEventServer( id, params)
  586.  
  587.     if (id == ScriptEvent_PhysicalizeOnDemand) then
  588.         self:SetPhysicParams( PHYSICPARAM_FLAGS, {flags_mask=pef_pushable_by_players, flags=0} );
  589.     end
  590.     
  591. end
  592.  
  593. --////////////////////////////////////////////////////////////////////////////////////////
  594. function Zodiac:OnShutDown()
  595.     VC.EveryoneOutForce(self);
  596.     VC.RemovePieces(self);    
  597. end
  598.  
  599.  
  600.  
  601. --////////////////////////////////////////////////////////////////////////////////////////
  602. function Zodiac:OnSave(stm)
  603. end
  604.  
  605. --////////////////////////////////////////////////////////////////////////////////////////
  606. function Zodiac:OnLoad(stm)
  607. end
  608.  
  609.  
  610. --////////////////////////////////////////////////////////////////////////////////////////
  611. function Zodiac:OnWrite( stm )
  612.     
  613. end
  614.  
  615. --////////////////////////////////////////////////////////////////////////////////////////
  616. function Zodiac:OnRead( stm )
  617.  
  618. end
  619.  
  620. --////////////////////////////////////////////////////////////////////////////////////////
  621.  
  622.  
  623. ----------------------------------------------------------------------------------------------------------------------------
  624. --
  625. --
  626. function Zodiac:RadioChatter()
  627. end
  628.  
  629.  
  630. ----------------------------------------------------------------------------------------------------------------------------
  631. --
  632. --
  633. --function Zodiac:LoadPeople()
  634. --
  635. ----    self:AIDriver( 1 );
  636. --    
  637. --    AI:Signal(SIGNALFILTER_GROUPONLY, 1, "SHARED_ENTER_ME_VEHICLE", self.id);
  638. --    self.dropState = 1;
  639. --    
  640. --end
  641.  
  642. ----------------------------------------------------------------------------------------------------------------------------
  643. --
  644. -- to test
  645. function Zodiac:StartPath(  )
  646.  
  647. --System:Log("\001 starting path");
  648.  
  649.     if( self.onPath == 1 ) then return end
  650.  
  651.     if(self.driver and self.passenger) then
  652.         self.onPath = 1;
  653.         
  654.         self:Event_GoPath( );
  655. --        BroadcastEvent( self,"StartAniPath" );
  656.     end    
  657. end
  658.  
  659. ----------------------------------------------------------------------------------------------------------------------------
  660. --
  661. -- to test
  662. function Zodiac:Event_StartAniPath( params )
  663.  
  664. System:LogToConsole("-----    got Event_StartAniPath -----");
  665.  
  666. end
  667.  
  668.  
  669.  
  670. ----------------------------------------------------------------------------------------------------------------------------
  671. --
  672. function Zodiac:Event_GoPath( params )
  673.  
  674. --System:Log("\001  Humvee GoPath  ");
  675.  
  676.     self.curPathStep = self.Properties.pathstart-1;
  677.     VC.AIDriver( self, 1 );    
  678.     AI:Signal(0, 1, "GO_PATH", self.id);
  679.  
  680. end
  681.  
  682.  
  683. ----------------------------------------------------------------------------------------------------------------------------
  684. --
  685.  
  686.  
  687. -------------------------------------------------------------------------------------------------------------
  688. --
  689. --
  690. function Zodiac:DoEnter( puppet )
  691.  
  692.     if( puppet == self.driverT.entity ) then        -- driver
  693.         VC.AddUserT( self, self.driverT );
  694.         VC.InitEnteringJump( self, self.driverT );
  695. --    end
  696.     else                            -- passengers
  697.         local tbl = VC.FindPassenger( self, puppet );
  698.         if( not tbl ) then return end
  699.         VC.AddUserT( self, tbl );
  700.         VC.InitEnteringJump( self, tbl );
  701.     end
  702.     
  703. end
  704.  
  705.  
  706. -------------------------------------------------------------------------------------------------------------
  707. --
  708. --
  709. function Zodiac:AddDriver( puppet )
  710.  
  711.     if (self.driverT.entity ~= nil)        then    -- already have a driver
  712.         do return 0 end
  713.     end
  714.     
  715.     self.driverT.entity = puppet;
  716.     if( VC.InitApproach( self, self.driverT )==0 ) then    
  717.         self:DoEnter( puppet );
  718.     end    
  719.     do return 1 end    
  720. --    return VC.AddDriver( self, puppet);
  721. end
  722.  
  723. -------------------------------------------------------------------------------------------------------------
  724. --
  725. --
  726. function Zodiac:AddGunner( puppet )
  727.     return 0        -- no gunner
  728. --    return VC.AddDGunner( self, puppet);
  729. end
  730.  
  731. ----------------------------------------------------------------------------------------------------------------------------
  732. --
  733. function Zodiac:AddPassenger( puppet )
  734.  
  735.     do return 0    end    -- no passanger for now
  736.  
  737.     local pasTbl = VC.CanAddPassenger( self, 1 );
  738.  
  739.     if( not pasTbl ) then    return 0 end    -- no more passangers can be added
  740.     
  741.     pasTbl.entity = puppet;
  742.     if( VC.InitApproach( self, pasTbl )==0 ) then
  743.         self:DoEnter( puppet );
  744.     end
  745.     do return 1 end    
  746. end
  747.  
  748.  
  749. ----------------------------------------------------------------------------------------------------------------------------
  750. --
  751. --
  752. function Zodiac:LoadPeople()
  753.  
  754.     if(VC.FreeToUse( self )==0) then return end    -- can't use it - player is in
  755.  
  756.     if(self.driverT.entity and self.driverT.entity.ai) then
  757. System:Log("boat LoadPeople  +++++ DRIVER IS IN ");
  758.         
  759.         AI:Signal(0, 1, "DRIVER_IN", self.id);
  760.     end    
  761.     
  762.     AI:Signal(SIGNALFILTER_GROUPONLY, 1, "wakeup", self.id);
  763.     AI:Signal(SIGNALFILTER_GROUPONLY, 1, "SHARED_ENTER_ME_VEHICLE", self.id);
  764.     self.dropState = 1;
  765. end
  766.  
  767.  
  768.  
  769. ----------------------------------------------------------------------------------------------------------------------------
  770. --
  771.  
  772. function Zodiac:Event_AddPlayer( params )
  773.  
  774.     if(_localplayer.theVehicle) then return end    -- this player is already in some (this) vehicle
  775.     
  776.     local theTable = VC.GetAvailablePosition(self);
  777.     
  778.     if(theTable == nil) then return end
  779.  
  780.     _localplayer.cnt.use_pressed = nil;
  781.     theTable.entity = _localplayer;
  782.     VC.AddUserT(self, theTable);    
  783.     
  784.  
  785.     
  786. end    
  787.  
  788. ----------------------------------------------------------------------------------------------------------------------------
  789. --
  790. function Zodiac:Event_DriverIn( params )
  791.  
  792.     BroadcastEvent( self,"DriverIn" );
  793.     
  794. end    
  795.  
  796.  
  797. -----------------------------------------------------------------------------------------------------
  798. --
  799. --
  800. function Zodiac:Event_Activate( params )
  801.  
  802.     if(self.bExploded == 1) then return end
  803.     
  804.     self:GotoState( "Alive" );
  805. end
  806.  
  807. ----------------------------------------------------------------------------------------------------------------------------
  808. --
  809. --
  810.  
  811. --------------------------------------------------------------------------------------------------------
  812. -- empty function to get reed of script error - it's called from behavours
  813. function Zodiac:MakeAlerted()
  814. end
  815.  
  816.  
  817. --------------------------------------------------------------------------------------------------------------
  818.